home *** CD-ROM | disk | FTP | other *** search
/ Virtual Top Model / Virtual Top Model - Disc 1.iso / modulos / mod-3.dxr / 00026.ls < prev    next >
Encoding:
Text File  |  1997-04-01  |  648 b   |  27 lines
  1. on exitFrame
  2.   global nBola, nFactor
  3.   repeat with xx = 1 to 4
  4.     puppetSprite(xx + 24, 0)
  5.   end repeat
  6.   rollboton()
  7.   if not ((the mouseV >= 17) and (the mouseH >= 93) and (the mouseV <= 119) and (the mouseH <= 135)) then
  8.     puppetSprite(nBola + 24, 1)
  9.     set the member of sprite (nBola + 24) to member ("BoutMod_3_B/" & nBola)
  10.     startTimer()
  11.     repeat while the timer < 5
  12.       nothing()
  13.     end repeat
  14.     updateStage()
  15.     set nBola to nBola + nFactor
  16.     if nBola = 5 then
  17.       set nBola to 3
  18.       set nFactor to -1
  19.     end if
  20.     if nBola = 0 then
  21.       set nBola to 2
  22.       set nFactor to 1
  23.     end if
  24.   end if
  25.   go(the frame)
  26. end
  27.